home *** CD-ROM | disk | FTP | other *** search
/ Speccy ClassiX 1998 / Speccy ClassiX 98.iso / amiga_system / the_aminet / dev / basic / gtboxconv.lha / gtboxconv / example / GTBoxConv.bb2 next >
Text File  |  1995-01-06  |  3KB  |  75 lines
  1. ;Code Generated By GadToolsBox Converter V3.01
  2. ;
  3. #GD_CONVERT = 0
  4. #GD_QUIT = 1
  5. #GD_ABOUT = 2
  6. #GD_Add_Comments = 3
  7. #GD_Add_Gad_Handler = 4
  8. #GD_Show_Ops = 5
  9. #GD_Operations = 6
  10. #GD_Gads_And_Bevs = 7
  11. #GD_WinNumber = 8
  12. #GD_GTListNumber = 9
  13. #GD_MenuMax = 10
  14. #GD_TextMax = 11
  15. #GD_BevelMax = 12
  16. ;
  17. LoadFont 0,"topaz.font",8
  18. ;
  19. WBStartUp : FindScreen 0,"Workbench"
  20. GTButton    0,#GD_CONVERT,29,26,123,17,"Convert",#PLACETEXT_IN
  21. GTButton    0,#GD_QUIT,26,92,126,14,"QUIT",#PLACETEXT_IN
  22. GTButton    0,#GD_ABOUT,29,48,122,17,"About",#PLACETEXT_IN
  23. GTCheckBox  0,#GD_Add_Comments,349,25,26,11,"Add Comments",#PLACETEXT_LEFT
  24. GTCheckBox  0,#GD_Add_Gad_Handler,349,37,26,11,"Add Gad Handler",#PLACETEXT_LEFT
  25. GTCheckBox  0,#GD_Show_Ops,349,49,26,11,"Show Operations",#PLACETEXT_LEFT
  26. GTText      0,#GD_Operations,127,121,256,12,"Operations:",#PLACETEXT_LEFT,""
  27. GTCheckBox  0,#GD_Gads_And_Bevs,349,61,26,11,"Gads And Bevels Only",#PLACETEXT_LEFT
  28. GTInteger   0,#GD_WinNumber,332,76,43,13,"Window Number",#PLACETEXT_LEFT,0
  29. GTInteger   0,#GD_GTListNumber,332,92,43,13,"GTList Number",#PLACETEXT_LEFT,0
  30. GTInteger   0,#GD_MenuMax,339,160,47,13,"Menu",#PLACETEXT_LEFT,50
  31. GTInteger   0,#GD_TextMax,197,160,47,13,"Text",#PLACETEXT_LEFT,30
  32. GTInteger   0,#GD_BevelMax,70,160,47,13,"Bevels",#PLACETEXT_LEFT,30
  33. ;
  34. winflags.l=#WFLG_DRAGBAR|#WFLG_DEPTHGADGET|#WFLG_CLOSEGADGET|#WFLG_SMART_REFRESH|#WFLG_ACTIVATE
  35. Window 0,128,24,410,190,winflags,"GTBox Converter V - By Fabio Rotondo.",1,2
  36. offx.b=WLeftOff:offy.b=WTopOff
  37. WSize 410,179+offy
  38. CatchDosErrs
  39. ;
  40. AttachGTList 0,0
  41. WindowFont 0
  42. WTitle "GTBox Converter V - By Fabio Rotondo.","GadToolsBox V2.0b ⌐ 1991-1993"
  43. ;
  44. ;
  45. WColour 2,0
  46. WLocate 63,11
  47. Print "Actions"
  48. WColour 2,0
  49. WLocate 256,11
  50. Print "Options"
  51. WColour 2,0
  52. WLocate 138,146
  53. Print "MAX POSSIBLE VALUES"
  54. ;
  55. GTBevelBox 0,offx+19,offy+8,139,14,$0
  56. GTBevelBox 0,offx+19,offy+89,139,20,$0
  57. GTBevelBox 0,offx+23,offy+91,131,16,$100
  58. GTBevelBox 0,offx+177,offy+8,207,14,$0
  59. GTBevelBox 0,offx+19,offy+23,139,45,$0
  60. GTBevelBox 0,offx+8,offy+117,386,20,$0
  61. GTBevelBox 0,offx+12,offy+119,378,16,$100
  62. GTBevelBox 0,offx+0,offy+140,402,37,$0
  63. GTBevelBox 0,offx+4,offy+142,394,33,$100
  64. GTBevelBox 0,offx+11,offy+4,156,109,$0
  65. GTBevelBox 0,offx+15,offy+6,148,105,$100
  66. GTBevelBox 0,offx+177,offy+23,207,86,$0
  67. GTBevelBox 0,offx+169,offy+4,222,109,$0
  68. GTBevelBox 0,offx+173,offy+6,214,105,$100
  69. GTBevelBox 0,offx+6,offy+2,389,114,$0
  70. GTBevelBox 0,offx+1,offy+0,401,140,$0
  71. ;
  72. ;-------  WRITTEN USING GADTOOLSBOX CONV V3.01  -----------
  73. ;------------       By FABIO ROTONDO       ---------------
  74. ;
  75.